m a t r i x m a p                                 p a c k a g e : u n k n o w n                                 R   D o c u m e n t a t i o n 
 
 
 
 M a t r i z e s   e   m a p a s   d e   d e n s i d a d e   p a r a   d o i s   f a t o r e s   d e   o r g a n i s m o s 
 
 
 
 D e s c r i p t i o n : 
 
 
 
 	 A   p a r t i r   d e   d a d o s   d e   o c o r r  n c i a   ( c o o r d e n a d a s   m  t r i c a s )   d e   d o i s   t i p o s   d e   o r g a n i s m o s   ( e . g . ,   d u a s   e s p  c i e s ,   m a c h o s   e   f  m e a s ,   d o i s   m o r f o t i p o s ) ,   c r i a   m a t r i z e s   d e   d e n s i d a d e   ( o u   r a z  o   e n t r e   d e n s i d a d e s )   e   m a p a s   c o l o r i d o s   s e m e l h a n t e s   a   h e a t m a p s . 
 
 
 
 U s a g e : 
 
     
 
 	 m a t r i x m a p ( d a t a , w x , w y , o u t p u t = 3 , p l o t = T R U E , e x p l i c i t = F A L S E ) 
 
 
 
 A r g u m e n t s : 
 
     
 
 d a t a 	 	 D a t a   f r a m e   d e   o c o r r  n c i a   d o s   i n d i v  d u o s ,   c o n t e n d o   t r  s   c o l u n a s   ( c o o r d e n a d a   x ,   c o o r d e n a d a   y   e   f a t o r   d o   i n d i v  d u o ) . 
 
 
 
 w x 	 	 V a l o r   n u m  r i c o   ( m a i o r   q u e   2 ) ,   d e t e r m i n a   q u a n t o s   s e g m e n t o s   d o   e i x o   x   s e r  o   g e r a d o s .   
 
     
 
 w y 	 	 V a l o r   n u m  r i c o   ( m a i o r   q u e   2 ) ,   q u e   d e t e r m i n a   q u a n t o s   s e g m e n t o s   d o   e i x o   y   s e r  o   g e r a d o s . 
 
     
 
 o u t p u t 	 1 ,   2   o u   3 .   D e t e r m i n a   q u a l   o   r e s u l t a d o   d a d o ,   s e   = 1   m o s t r a   a p e n a s   a   d e n s i d a d e   p a r a   i n d i v  d u o s   d e   p r i m e i r o   f a t o r ,   s e   = 2   m o s t r a   a p e n a s   a   d e n s i d a d e   p a r a   i n d i v  d u o s   d e   s e g u n d o   f a t o r .   S e   = 3   ( p a d r  o )   m o s t r a   a   r a z  o   d a s   d e n s i d a d e s   e n t r e   i n d i v  d u o s   d e   p r i m e i r o   f a t o r   p o r   i n d i v  d u o s   d e   s e g u n d o   f a t o r .   
 
 
 
 p l o t 	 	 V a l o r   l  g i c o .   S e   = F A L S E ,   r e t o r n a   a p e n a s   a   m a t r i z   d e   d e n s i d a d e ;   s e   = T R U E   ( p a d r  o ) ,   p r o d u z   o   m a p a   d e   d e n s i d a d e   c o m   c o r e s   c o r r e s p o n d e n t e s   ( e   c o m   b a r r a   d e   c o r e s ) . 
 
     
 
 e x p l i c i t 	 V a l o r   l  g i c o .   S e   = F A L S E   ( p a d r  o ) ,   n  o   p r o d u z   n e n h u m   e f e i t o ;   s e   = T R U E ,   c o l o c a   o s   v a l o r e s   d e   d e n s i d a d e   d i r e t a m e n t e   n o   m a p a . 
 
 
 
 D e t a i l s : 
 
 
 
 	 A   d i s t r i b u i   o   e   a   d e n s i d a d e   d e   o r g a n i s m o s   n o   e s p a  o      v i s t a   m u i t a s   v e z e s   c o m o   h o m o g  n e a .   E n t r e t a n t o ,      s e m p r e   p o s s  v e l   q u e   i n d i v  d u o s   d e   d i f e r e n t e s   s e x o s   o u   m o r f o t i p o s   o c u p e m   d i f e r e n t e s   l o c a i s   n o   a m b i e n t e .   E s s a   f u n   o   t e m   c o m o   o b j e t i v o   p e r m i t i r   u m a   a n  l i s e   g r  f i c a   e x p l o r a t  r i a   e m   d i f e r e n t e s   e s c a l a s   ( a j u s t a n d o   w x   e   w y )   d a   d i s t r i b u i   o   e   d e n s i d a d e   d e   d o i s   t i p o s   d e   i n d i v  d u o s   o b s e r v a d o s .   A   m a t r i z   g e r a d a   d    a   p o s s i b i l i d a d e   a n a l i s a r   m a i s   p r o f u n d a m e n t e   a   h e t e r o g e n e i d a d e   e m   u m a   d a d a   e s c a l a   o u   e n t r e   e s c a l a s   d i f e r e n t e s . 
 
 
 
 V a l u e s : 
 
 
 
 	 A   f u n   o   p o d e   r e t o r n a r   u m a   m a t r i z   ( p l o t = F )   o u   u m   m a p a   ( p l o t = T ) .   O s   d o i s   r e p r e s e n t a m   o s   m e s m o s   d a d o s :   n  m e r o   d e   i n d i v  d u o s   d e   f a t o r   1   p o r   c  l u l a   ( o u t p u t = 1 ) ,   n  m e r o   d e   i n d i v  d u o s   d e   f a t o r   2   p o r   c  l u l a   ( o u t p u t = 2 )   o u   r a z  o   f a t o r   1 : f a t o r   2   ( o u t p u t = 3 )   p o r   c  l u l a . 
 
 
 
 W a r n i n g s : 
 
 
 
 	 O   d a t a   f r a m e   d e   e n t r a d a   d e v e   t e r   a p e n a s   d o i s   f a t o r e s   ( e . g . ,   1   e   2 ,   M   e   F ) ,   c a s o   c o n t r  r i o ,   a   f u n   o   i r    p a r a r   e   m o s t r a r   m e n s a g e m   d e   e r r o .   A d e m a i s ,   o   d a t a   f r a m e   n  o   p o d e   c o n t e r   N A s ;   c a s o   t e n h a ,   a   f u n   o   a v i s a r    o   u s u  r i o   p a r a   q u e   a   c o r r e   o   s e j a   f e i t a . 
 
 
 
 	 C a s o   w x   o u   w y   s e j a   u m   n  m e r o   d e c i m a l ,   i r    s e r   a r r e d o n d a d o   p a r a   b a i x o   ( e . g . , 2 . 9 = 2 ) .   C a s o   w x   o u   w y   s e j a   m u i t o   g r a n d e ,   a   f u n   o   p o d e r    l e v a r   m a i s   t e m p o   p a r a   r o d a r . 
 
 
 
 N o t e s : 
 
 
 
 	 A   m a t r i z   r e s u l t a n t e   d a   r a z  o   e n t r e   d e n s i d a d e   d e   i n d i v  d u o s   d e   f a t o r   1   p e l a   d e n s i d a d e   d e   i n d i v  d u o s   d e   f a t o r   2   p o d e   t e r   v a l o r e s   I n f ,   N a N   e   z e r o   ( a l  m   d o s   d e m a i s ,   q u e   s  o   d i v i s  e s   " n o r m a i s " ) .   I n f      r e s u l t a n t e   d a   d i v i s  o   d e   q u a l q u e r   v a l o r   a c i m a   d e   z e r o   p o r   z e r o ,   i s t o    ,   r e p r e s e n t a   q u e   n a q u e l a   c  l u l a   s    h    i n d i v  d u o s   d e   f a t o r   1 .   Z e r o   ( 0 )      r e s u l t a n t e   d a   d i v i s  o   d e   z e r o   p o r   q u a l q u e r   v a l o r   m a i o r   q u e   z e r o ,   i s t o    ,   r e p r e s e n t a   q u e   n a q u e l a   c  l u l a   s    h    i n d i v  d u o s   d e   f a t o r   2 .   N a N      r e s u l t a n t e   d a   d i v i s  o   d e   z e r o   p o r   z e r o ,   i s t o    ,   r e p r e s e n t a   q u e   n a q u e l a   c  l u l a   n  o   h    i n d i v  d u o s   n e m   d e   f a t o r   1   n e m   d e   f a t o r   2 .   
 
 
 
 	 O s   v a l o r e s   p a r a   x   e   y   d e v e m   s e r   c o o r d e n a d a s   m  t r i c a s .      i m p o r t a n t e   f i c a r   c l a r o   q u e   a   o r d e m   d o s   f a t o r e s      e s t a b e l e c i d a   a l f a b e t i c a m e n t e ,   i s t o    ,   s e   o s   f a t o r e s   ( t i p o s   d e   i n d i v  d u o s )   n o   d a t a f r a m e   f o r e m   " M "   e   " F " ,   " F "   s e r    o   " f a t o r   1 "   e   " M "   s e r    o   " f a t o r   2 " . 
 
 
 
 	 P a r a   o s   m a p a s ,   n o   c a s o   d e   o u t p u t = 1   o u   = 2 ,   o   g r a d i e n t e   d e   c o r e s      f e i t o   a   f i m   d e   r e p r e s e n t a r   q u a n t o s   i n d i v  d u o s   h    e m   c a d a   c  l u l a   d o   r e s p e c t i v o   f a t o r .   N o   c a s o   d e   o u t p u t = 3 ,   o   g r a d i e n t e   d e   c o r e s      f e i t o   a   f i m   d e   r e p r e s e n t a r   a   r a z  o   d e   i n d i v  d u o s   d e   f a t o r   1   p o r   i n d i v  d u o s   d e   f a t o r   2   e m   c a d a   c  l u l a . 
 
 
 
 	 S e   e x p l i c i t = T ,   q u a n d o   o u t p u t = 1   o u   = 2 ,   o s   n  m e r o s   p l o t a d o s   r e p r e s e n t a m   q u a n t o s   i n d i v  d u o s   h    e m   c a d a   c  l u l a .   Q u a n d o   o u t p u t = 3 ,   o s   n  m e r o s   p l o t a d o s   m o s t r a m   q u a n t o s   i n d i v  d u o s   d e   f a t o r   1   e   q u a n t o s   i n d i v  d u o s   d e   f a t o r   2   h    e m   c a d a   c  l u l a   s e p a r a d o   p o r   u m   " : " ,   j    q u e   o   m a p a   r e p r e s e n t a   j u s t a m e n t e   o   v a l o r   d a   r a z  o   e n t r e   o s   d o i s   e m   c a d a   c  l u l a . 
 
 
 
 
 
 A u t o r ( s ) : 
 
 
 
 P i e t r o   P o l l o   ( p i e t r o _ p o l l o @ h o t m a i l . c o m ) . 
 
 
 
 E x a m p l e s : 
 
 
 
 # d a t a   f r a m e   d e   e x e m p l o : 
 
 e x e = d a t a . f r a m e ( x = c ( r n o r m ( 1 5 0 , 1 0 0 , 1 5 ) , r n o r m ( 2 5 0 , 1 0 0 , 2 0 ) ) , y = c ( r n o r m ( 1 5 0 , 1 0 0 , 2 0 ) , r n o r m ( 2 5 0 , 1 0 0 , 2 2 ) ) , f a t o r e s = c ( r e p ( " M " , 1 5 0 ) , r e p ( " F " , 2 5 0 ) ) )   # n o t e   q u e   a p e s a r   d e   i n d i v  d u o s   " M "   e s t a r e m   a n t e s   d o s   i n d i v  d u o s   " F "   n o   d a t a f r a m e ,   " F "      o   f a t o r   1   e   " M "   o   f a t o r   2 . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 1 , p l o t = F )   # m a t r i z   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   1   s o m e n t e ,   q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 1 )   # m a p a   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   1   s o m e n t e   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 1 , e x p l i c i t = T )   # m a p a   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   1   s o m e n t e ,   c o m   v a l o r e s   e x p l  c i t o s   n o   p l o t   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 2 , p l o t = F )   # m a t r i z   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   2   s o m e n t e ,   q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 2 )   # m a p a   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   2   s o m e n t e   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , o u t p u t = 2 , e x p l i c i t = T )   # m a p a   d e   d e n s i d a d e   r e f e r e n t e   a o s   i n d i v  d u o s   d e   f a t o r   2   s o m e n t e ,   c o m   v a l o r e s   e x p l  c i t o s   n o   p l o t   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , p l o t = F )   # m a t r i z   r e s u l t a n t e   d a   r a z  o   e n t r e   q u a n t i a   d e   i n d i v  d u o s   d e   f a t o r   1   p o r   f a t o r   2   e m   c a d a   c  l u l a ,   q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 )   # m a p a   q u e   m o s t r a   a   r a z  o   e n t r e   d e n s i d a d e s   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 
 
 
 
 m a t r i x m a p ( e x e , 1 5 , 1 5 , e x p l i c i t = T )   # m a p a   q u e   m o s t r a   a   r a z  o   e n t r e   d e n s i d a d e s   c o m   o s   v a l o r e s   e x p l  c i t o s   p l o t a d o s   ( q u a n d o   x   e   y   t e m   1 5   s e g m e n t o s   c a d a ) . 